|
AutoCAD VBA : Zeichnen in Formularen
Stelli1 am 02.08.2008 um 14:58 Uhr (0)
Hallo Sebastian,VBA ist ja auch nicht c++.VBA ist ja auch mehr oder weniger nur eine Scriptsprache, mit der man allerdings einiges machen kann. Und was hier nicht geht kannst du aus anderen Sprachen holen.Ein OCX ist ein Steuerelement, dass über die ActiveX Schnittstelle mit dem Hostprogramm kommuniziert. Grundsätzlich verhält sich das OCX wie ein normales Control welches du in dein Formular ziehst.Das kannst du dir selber machen (z.B. mit VB oder C oder ..), oder du suchst nach entsprechenden Angeboten im ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : selectionset sortieren?
Stelli1 am 30.09.2007 um 13:02 Uhr (0)
Hallo Peter,ein Selectionset ist eine Collection von Referenzen zu Objekten die durch eine Auswahl aus der Zeichnung gefüllt wird. Das heisst, jede Referenz hat eine Position(ID) innerhalb des Selectionsets.Code:for ID=0 to sset.count -1 set RefObj = sset(ID)next IDDu kannst aber auch das Handle der Objekte speichern.Code:handle=RefObj.HandleDann bauchst du nicht mehr auf dein Selectionset zurückgreifen und kannt mitCode:set RefObj=Thisdrawing.HandleToObject(Handle)das Objekt wieder ansprechen.Wilfried ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : InsertBlock funktioniert immer nur einmal pro Zeichnung
Stelli1 am 12.03.2008 um 19:40 Uhr (0)
Hallo,mit deiner Funktion fügst du ja auch eine Datei ein. Die wird dann in der zweiten Zeichnung noch geöffnet sein.Wenn du es sauber lösen willst, fügst du die Datei einmal ein (z.B. über CopyObjects) und fügsts dann den Block aus der Zeichnung ein.Wilfried StelbergPS: [EDIT]Wer bist du denn jetzt der oder der------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:24 Uhr (0)
Wie machst du es denn mit dem Batchbetrieb ?Im Sucher gibt es da eine Menge:-Zeichnung öffnen-Selectionset anlegen-Selectionset füllen mit SelectAll und Filter für Blöcke-Alle Elemente im Selectionset durchlaufen und Linienstärke ändern-SpeichernStelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Einen Block aus einer Zeichnung in eine andere kopieren
Stelli1 am 28.04.2006 um 11:37 Uhr (0)
Hallo Lary,folgender Code kopiert die Blockdefinition von einer Zeichnung in eine andere und fügt in zur Kontrolle ein.Code:Option ExplicitSub CopyBlock() Dim SourceDoc As AcadDocument Dim Targetdoc As AcadDocument Dim BlockDef As AcadBlock Dim CopyBlockDef(0) As Object Dim Result As Variant Zeichnung zuweisen (beide sind geöffnet) Set SourceDoc = Application.Documents(0) Debug.Print SourceDoc.Name Set Targetdoc = Application.Documents(1) Debug.Print Targetdoc.Name Der zu kopierende Bloc ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Variable aus Modul mit Zeichnung speichern
Stelli1 am 09.01.2007 um 10:45 Uhr (0)
Hallo Burchii,die von Thomas vorgeschlagene Methode scheint mit auch die bessere. Sonst löscht nacher einer die Linie oder den Block weg. Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Schrittweise Auswertung der Zeichnung mit SelectAtPoint
Stelli1 am 16.03.2007 um 11:19 Uhr (0)
Übringens noch ein kleiner Tipp.Versuch doch mal dein Posting ein wenig aufzuräumen.Da kann man sonst schwer Code vom Text unterscheiden. Und ein wenig Einrückungen im Quelltext würde die Übersichtlichkeit sehr fördern.Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Schrittweise Auswertung der Zeichnung mit SelectAtPoint
Stelli1 am 15.03.2007 um 13:48 Uhr (0)
Hallo,es gibt da wohl noch ein paar Punkte ...Ein selectionset (mit und ohne s) mit gleichen Namen kann nur einmal pro Zeichnung existieren. Du musst prüfen ob eines da ist und wenn nicht eins anlegen.Code:on error resume nextset sset = thisdrawing.selectionsets("Mysel")if err.number then set sset = thisdrawing.selectionsets.add("Mysel")end ifon error goto 0Wenn du per Sendcommand ein Element erzeugts kannst du dir dieses in der passenden Ereignisroutine in AutoCAD abfangen.Code: Thisdrawing CodePrivate S ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:37 Uhr (0)
Mir fällt nur noch ein das nur Elemente gefunden werden die im aktuellen Bildschirmausschnitt liegen.Vielleicht vorher mal Zoom GrenzenStelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:08 Uhr (0)
Hallo,ich dachte das wäre gelöst ?Da brauchst du doch nur schauen was es für Elemente sind und denen dann die Liniestärke zuweisen.entity.Lineweight =acLnWt035Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : ausgewählte Elemente in der Zeichnung per Macros abfragen
Stelli1 am 03.10.2007 um 13:47 Uhr (0)
Hallo Thom,schau dir doch mal diesen Beitrag an.Hier gibt es auch noch eine Info.Der Trick ist eigentlich das im Buttonmacro ein zuvor mit lisp definierter Befehl aufgerufen wird. Das hat auch noch den Vorteil, dass die Befehlswiederholung klappt.Wilfried Stelberg------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Schrittweise Auswertung der Zeichnung mit SelectAtPoint
Stelli1 am 15.03.2007 um 20:03 Uhr (0)
Hallo, das eine hat mit dem anderen nichts zu tun. Zitat:Original erstellt von Sagu:Public NeuesElement As AcadObject...Es kommt eine Fehlermeldung, Typen unverträglich. Was mache ich falsch?sollte auch Public NeuesElement As Object heissen.Um den Typnamen oder anderes festzustellen klicks du auf den Objektnamen im Code (während der Laufzeit mit Breakpoint) und drückst shift+F9.Dann kannst du die Eigenschaften des Objektes im Überwachungsfenster anschauen.StelliStelli------------------Warum lispeln wenns ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:32 Uhr (0)
Und was funktioniert nicht ?Abgesehen davon, wo liegt der Sinn darin die Linienstärke auf byBlock zu setzen. Das wäre bei Erzeugen der Blockelemente sinnvoll aber doch nicht bei den Einfügungen. Oder sollen die keine Linienstärke haben ?Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
